Sub Escape()
'1."" 有转义规则
    Debug.Print """外部的三个双引号相当于一个双引号"""
    '四个双引号相当于一个单引号
    Debug.Print """"
    Debug.Print "内部的双引号""显示为一个单引号"
'2. 符号常数生效
    ' chr(32) "空格 chr(34) "双引号 chr(39) "单引号 chr(10) "换行 等同 vblf
    Debug.Print Chr(10) + Chr(34) & "我代表双引号" & Chr(34)
End Sub
